﻿Public Class Form1

    Private Sub Listview_SelectedIndexChanged(sender As Object, e As EventArgs) Handles Listview.SelectedIndexChanged
       
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Listview.Columns.Add("1", "MSSV", 50, HorizontalAlignment.Left, 1)
        Me.Listview.Columns.Add("2", "Lop", 50, HorizontalAlignment.Left, 2)
        Me.Listview.Columns.Add("Ho va ten", 200, HorizontalAlignment.Left)
        Me.Listview.Columns.Add("Diem Toan", 75, HorizontalAlignment.Left)
        Me.Listview.Columns.Add("Diem Van", 75, HorizontalAlignment.Left)
        Me.Listview.Columns.Add("Diem Anh Van", 85, HorizontalAlignment.Left)

        Me.Listview.GridLines = True
        Me.Listview.View = View.Details
        Me.Controls.Add(Me.Listview)
    End Sub

    Private Sub btnThem_Click(sender As Object, e As EventArgs) Handles btnThem.Click
        Dim list As ListViewItem = Listview.Items.Add(txtMSSV.Text)
        list.SubItems.AddRange(New String() {txtLop.Text, txtTen.Text, txtToan.Text, txtVan.Text, txtAV.Text})
    End Sub

    Private Sub btnThoat_Click(sender As Object, e As EventArgs) Handles btnThoat.Click
        Close()
    End Sub
End Class
